/ Chip 2004 November / CMCD1104.ISO / Util / Winamp / winamp505_full.exe / Plugins / avs / Winamp 5 Picks / UnConeD - Zero-G Maze II.avs

< prev

next >

view JSON data

view as text

open on a Mac

open on a PC

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 4e 75 6c 6c 73 6f 66 74 | 20 41 56 53 20 50 72 65 |Nullsoft| AVS Pre|
|00000010| 73 65 74 20 30 2e 32 1a | 00 15 00 00 00 35 04 00 |set 0.2.|.....5..|
|00000020| 00 31 04 00 00 20 57 68 | 61 63 6b 6f 20 41 56 53 |.1... Wh|acko AVS|
|00000030| 20 56 20 2d 20 5a 65 72 | 6f 2d 47 20 4d 61 7a 65 | V - Zer|o-G Maze|
|00000040| 20 49 49 0d 0a 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | II..---|--------|
|00000050| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000060| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000070| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 0a 0d 0a 52 |--------|---....R|
|00000080| 65 6d 65 6d 62 65 72 20 | 74 68 69 73 20 6f 6e 65 |emember |this one|
|00000090| 3f 20 49 20 72 65 6d 65 | 6d 62 65 72 20 74 68 65 |? I reme|mber the|
|000000a0| 20 6d 61 69 6e 20 63 6f | 6d 6d 65 6e 74 20 6f 6e | main co|mment on|
|000000b0| 20 5a 65 72 6f 2d 47 20 | 4d 61 7a 65 20 77 61 73 | Zero-G |Maze was|
|000000c0| 20 74 68 61 74 20 74 68 | 65 20 63 61 6d 65 72 61 | that th|e camera|
|000000d0| 20 73 68 6f 75 6c 64 27 | 76 65 20 67 6f 6e 65 20 | should'|ve gone |
|000000e0| 69 6e 74 6f 20 74 68 65 | 20 74 75 6e 6e 65 6c 73 |into the| tunnels|
|000000f0| 20 72 61 74 68 65 72 20 | 74 68 61 6e 20 73 77 69 | rather |than swi|
|00000100| 72 6c 69 6e 67 20 61 72 | 6f 75 6e 64 20 61 6e 20 |rling ar|ound an |
|00000110| 69 6e 74 65 72 73 65 63 | 74 69 6f 6e 2e 0d 0a 0d |intersec|tion....|
|00000120| 0a 41 73 6b 20 61 6e 64 | 20 79 6f 75 20 73 68 61 |.Ask and| you sha|
|00000130| 6c 6c 20 62 65 20 73 65 | 72 76 65 64 2e 2e 2e 20 |ll be se|rved... |
|00000140| 74 68 69 73 20 6d 61 6a | 6f 72 6c 79 20 69 6d 70 |this maj|orly imp|
|00000150| 72 6f 76 65 64 20 76 65 | 72 73 69 6f 6e 20 6c 6f |roved ve|rsion lo|
|00000160| 6f 6b 73 20 61 6e 64 20 | 62 65 68 61 76 65 73 20 |oks and |behaves |
|00000170| 61 20 6c 6f 74 20 62 65 | 74 74 65 72 2c 20 61 6e |a lot be|tter, an|
|00000180| 64 20 6f 66 20 63 6f 75 | 72 73 65 20 69 74 20 65 |d of cou|rse it e|
|00000190| 6e 74 65 72 73 20 74 75 | 6e 6e 65 6c 73 20 74 6f |nters tu|nnels to|
|000001a0| 6f 2e 0d 0a 0d 0a 48 6f | 77 65 76 65 72 20 74 68 |o.....Ho|wever th|
|000001b0| 65 72 65 20 69 73 20 61 | 20 63 61 74 63 68 2e 20 |ere is a| catch. |
|000001c0| 49 20 68 61 64 20 74 6f | 20 74 61 6b 65 20 61 20 |I had to| take a |
|000001d0| 73 68 6f 72 74 63 75 74 | 20 77 68 69 63 68 20 69 |shortcut| which i|
|000001e0| 73 20 6c 75 63 6b 69 6c | 79 20 6e 6f 74 20 73 6f |s luckil|y not so|
|000001f0| 20 6e 6f 74 69 63 61 62 | 6c 65 3a 20 74 68 65 20 | noticab|le: the |
|00000200| 63 61 6d 65 72 61 20 61 | 6c 77 61 79 73 20 70 69 |camera a|lways pi|
|00000210| 63 6b 73 20 74 68 65 20 | 73 61 6d 65 20 74 75 6e |cks the |same tun|
|00000220| 6e 65 6c 2e 20 54 68 69 | 73 20 69 73 20 62 65 63 |nel. Thi|s is bec|
|00000230| 61 75 73 65 20 74 68 65 | 20 63 6f 64 65 20 66 6f |ause the| code fo|
|00000240| 72 20 61 6c 6c 6f 77 69 | 6e 67 20 69 74 20 74 6f |r allowi|ng it to|
|00000250| 20 67 6f 20 69 6e 20 61 | 6e 79 20 64 69 72 65 63 | go in a|ny direc|
|00000260| 74 69 6f 6e 20 69 73 20 | 74 6f 6f 20 63 6f 6d 70 |tion is |too comp|
|00000270| 6c 69 63 61 74 65 64 20 | 62 65 63 61 75 73 65 20 |licated |because |
|00000280| 41 56 53 20 6c 61 63 6b | 73 20 64 65 63 65 6e 74 |AVS lack|s decent|
|00000290| 20 63 6f 64 65 20 63 6f | 6e 74 72 6f 6c 20 73 74 | code co|ntrol st|
|000002a0| 72 75 63 74 75 72 65 73 | 2e 0d 0a 0d 0a 54 68 65 |ructures|.....The|
|000002b0| 20 72 65 61 73 6f 6e 20 | 69 74 27 73 20 6e 6f 74 | reason |it's not|
|000002c0| 20 6e 6f 74 69 63 61 62 | 6c 65 20 69 73 20 62 65 | noticab|le is be|
|000002d0| 63 61 75 73 65 20 74 68 | 65 20 63 61 6d 65 72 61 |cause th|e camera|
|000002e0| 20 72 6f 74 61 74 65 73 | 20 61 72 6f 75 6e 64 20 | rotates| around |
|000002f0| 71 75 69 74 65 20 61 20 | 6c 6f 74 20 61 6e 64 20 |quite a |lot and |
|00000300| 79 6f 75 20 67 65 74 20 | 64 69 73 6f 72 69 65 6e |you get |disorien|
|00000310| 74 65 64 20 65 61 73 69 | 6c 79 2e 0d 0a 0d 0a 2d |ted easi|ly.....-|
|00000320| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000330| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000340| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000350| 0d 0a 55 6e 43 6f 6e 65 | 44 20 2f 20 53 74 65 76 |..UnCone|D / Stev|
|00000360| 65 6e 20 57 69 74 74 65 | 6e 73 0d 0a 5b 20 73 74 |en Witte|ns..[ st|
|00000370| 65 76 65 6e 40 61 63 6b | 6f 2e 6e 65 74 20 2d 20 |even@ack|o.net - |
|00000380| 77 77 77 2e 61 63 6b 6f | 2e 6e 65 74 20 5d 0d 0a |www.acko|.net ]..|
|00000390| 0d 0a 28 49 66 20 79 6f | 75 20 77 69 73 68 20 74 |..(If yo|u wish t|
|000003a0| 6f 20 75 73 65 20 74 68 | 69 73 20 70 72 65 73 65 |o use th|is prese|
|000003b0| 74 20 70 61 72 74 69 61 | 6c 6c 79 20 6f 72 20 77 |t partia|lly or w|
|000003c0| 68 6f 6c 65 20 69 6e 20 | 79 6f 75 72 20 6f 77 6e |hole in |your own|
|000003d0| 20 70 72 65 73 65 74 73 | 20 6f 72 20 70 61 63 6b | presets| or pack|
|000003e0| 73 2c 20 79 6f 75 20 6d | 61 79 20 64 6f 20 73 6f |s, you m|ay do so|
|000003f0| 20 70 72 6f 76 69 64 65 | 64 20 74 68 61 74 20 61 | provide|d that a|
|00000400| 20 63 6c 65 61 72 20 63 | 72 65 64 69 74 20 6d 65 | clear c|redit me|
|00000410| 73 73 61 67 65 20 69 73 | 20 69 6e 63 6c 75 64 65 |ssage is| include|
|00000420| 64 20 69 6e 20 79 6f 75 | 72 20 70 72 65 73 65 74 |d in you|r preset|
|00000430| 2c 20 61 6c 6f 6e 67 20 | 77 69 74 68 20 6d 79 20 |, along |with my |
|00000440| 63 6f 6e 74 61 63 74 20 | 69 6e 66 6f 72 6d 61 74 |contact |informat|
|00000450| 69 6f 6e 2e 29 00 fe ff | ff ff d1 01 00 00 80 00 |ion.)...|........|
|00000460| 00 01 24 80 00 00 00 80 | 00 00 00 00 00 00 00 00 |..$.....|........|
|00000470| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 01 |........|........|
|00000480| 00 00 00 28 00 00 00 04 | 00 00 00 01 00 02 80 14 |...(....|........|
|00000490| 00 00 00 04 00 00 00 01 | 00 00 00 03 00 00 00 08 |........|........|
|000004a0| 00 00 00 05 00 00 00 00 | 00 00 00 24 00 00 00 fc |........|...$....|
|000004b0| 00 00 00 01 a7 00 00 00 | 70 78 3d 73 69 6e 28 28 |........|px=sin((|
|000004c0| 67 65 74 6f 73 63 28 69 | 2a 2e 35 2c 30 2c 30 29 |getosc(i|*.5,0,0)|
|000004d0| 2b 72 61 6e 64 28 32 29 | 2a 2e 30 31 29 2a 33 2e |+rand(2)|*.01)*3.|
|000004e0| 31 34 29 3b 70 79 3d 73 | 69 6e 28 67 65 74 6f 73 |14);py=s|in(getos|
|000004f0| 63 28 69 2a 2e 35 2b 2e | 35 2c 30 2c 30 29 2a 33 |c(i*.5+.|5,0,0)*3|
|00000500| 2e 31 34 29 3b 0d 0a 70 | 63 3d 61 62 6f 76 65 28 |.14);..p|c=above(|
|00000510| 61 62 73 28 70 78 2d 78 | 29 2c 61 62 73 28 70 79 |abs(px-x|),abs(py|
|00000520| 2d 79 29 29 3b 0d 0a 78 | 3d 69 66 28 70 63 2c 70 |-y));..x|=if(pc,p|
|00000530| 78 2c 78 29 3b 0d 0a 79 | 3d 69 66 28 70 63 2c 79 |x,x);..y|=if(pc,y|
|00000540| 2c 70 79 29 3b 0d 0a 72 | 65 64 3d 63 76 3b 67 72 |,py);..r|ed=cv;gr|
|00000550| 65 65 6e 3d 31 3b 62 6c | 75 65 3d 63 76 3b 00 1c |een=1;bl|ue=cv;..|
|00000560| 00 00 00 74 3d 74 2d 30 | 2e 30 35 3b 70 78 3d 30 |...t=t-0|.05;px=0|
|00000570| 3b 70 79 3d 30 3b 78 3d | 30 3b 79 3d 30 3b 00 12 |;py=0;x=|0;y=0;..|
|00000580| 00 00 00 63 76 3d 72 61 | 6e 64 28 31 30 30 29 2a |...cv=ra|nd(100)*|
|00000590| 2e 30 31 3b 00 06 00 00 | 00 6e 3d 32 30 3b 00 02 |.01;....|.n=20;..|
|000005a0| 00 00 00 01 00 00 00 ff | ff ff 00 01 00 00 00 12 |........|........|
|000005b0| 00 00 00 0c 00 00 00 00 | 00 00 00 00 00 00 00 01 |........|........|
|000005c0| 00 00 00 fe ff ff ff 64 | 00 00 00 82 02 01 00 24 |.......d|.......$|
|000005d0| 80 00 00 00 80 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005e0| 00 00 00 00 00 00 00 00 | 01 00 00 00 01 00 00 00 |........|........|
|000005f0| 0f 00 00 00 23 00 00 00 | ff 7f 00 00 01 06 00 00 |....#...|........|
|00000600| 00 79 3d 30 2e 31 00 01 | 00 00 00 00 00 00 00 01 |.y=0.1..|........|
|00000610| 00 00 00 00 00 00 00 00 | 00 00 00 12 00 00 00 0c |........|........|
|00000620| 00 00 00 00 00 00 00 00 | 00 00 00 02 00 00 00 fe |........|........|
|00000630| ff ff ff 0a 01 00 00 80 | 00 00 00 24 80 00 00 00 |........|...$....|
|00000640| 80 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000650| 00 00 00 00 00 00 00 00 | 01 00 00 00 fe ff ff ff |........|........|
|00000660| dd 00 00 00 82 02 00 00 | 24 80 00 00 00 80 00 00 |........|$.......|
|00000670| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000680| 00 01 00 00 00 01 00 00 | 00 24 00 00 00 87 00 00 |........|.$......|
|00000690| 00 01 51 00 00 00 78 3d | 30 3b 79 3d 30 3b 0d 0a |..Q...x=|0;y=0;..|
|000006a0| 72 65 64 3d 73 69 6e 28 | 68 75 29 2a 2e 35 2b 2e |red=sin(|hu)*.5+.|
|000006b0| 35 3b 0d 0a 67 72 65 65 | 6e 3d 73 69 6e 28 68 75 |5;..gree|n=sin(hu|
|000006c0| 2b 32 2e 30 39 29 2a 2e | 35 2b 2e 35 3b 0d 0a 62 |+2.09)*.|5+.5;..b|
|000006d0| 6c 75 65 3d 73 69 6e 28 | 68 75 2b 34 2e 31 38 29 |lue=sin(|hu+4.18)|
|000006e0| 2a 2e 35 2b 2e 35 00 00 | 00 00 00 11 00 00 00 68 |*.5+.5..|.......h|
|000006f0| 75 3d 72 61 6e 64 28 36 | 32 38 29 2a 2e 30 31 00 |u=rand(6|28)*.01.|
|00000700| 04 00 00 00 6e 3d 31 00 | 02 00 00 00 01 00 00 00 |....n=1.|........|
|00000710| ff ff ff 00 00 00 00 00 | 0f 00 00 00 21 00 00 00 |........|....!...|
|00000720| ff 7f 00 00 01 04 00 00 | 00 64 3d 30 00 00 00 00 |........|.d=0....|
|00000730| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000740| 00 2b 00 00 00 67 08 00 | 00 01 cd 02 00 00 79 3d |.+...g..|......y=|
|00000750| 79 2a 61 66 2b 2e 30 30 | 30 31 3b 78 3d 78 2b 2e |y*af+.00|01;x=x+.|
|00000760| 30 30 30 31 3b 0d 0a 64 | 78 31 3d 78 2a 63 7a 2d |0001;..d|x1=x*cz-|
|00000770| 79 2a 73 7a 3b 0d 0a 64 | 79 31 3d 78 2a 73 7a 2b |y*sz;..d|y1=x*sz+|
|00000780| 79 2a 63 7a 3b 0d 0a 64 | 79 32 3d 64 79 31 2a 63 |y*cz;..d|y2=dy1*c|
|00000790| 78 2d 2e 39 2a 73 78 3b | 0d 0a 64 7a 32 3d 64 79 |x-.9*sx;|..dz2=dy|
|000007a0| 31 2a 73 78 2b 2e 39 2a | 63 78 3b 0d 0a 64 78 33 |1*sx+.9*|cx;..dx3|
|000007b0| 3d 64 78 31 2a 63 79 2d | 64 7a 32 2a 73 79 3b 0d |=dx1*cy-|dz2*sy;.|
|000007c0| 0a 64 7a 33 3d 64 78 31 | 2a 73 79 2b 64 7a 32 2a |.dz3=dx1|*sy+dz2*|
|000007d0| 63 79 3b 0d 0a 6b 31 3d | 28 6f 7a 2b 6f 7a 66 2b |cy;..k1=|(oz+ozf+|
|000007e0| 73 69 67 6e 28 64 7a 33 | 29 29 2f 64 7a 33 3b 0d |sign(dz3|))/dz3;.|
|000007f0| 0a 6b 31 3d 69 66 28 62 | 65 6c 6f 77 28 6b 31 2c |.k1=if(b|elow(k1,|
|00000800| 30 29 2c 2d 31 30 30 30 | 2c 6b 31 29 3b 0d 0a 6b |0),-1000|,k1);..k|
|00000810| 32 3d 28 6f 79 2b 73 69 | 67 6e 28 64 79 32 29 29 |2=(oy+si|gn(dy2))|
|00000820| 2f 64 79 32 3b 0d 0a 6b | 32 3d 69 66 28 62 65 6c |/dy2;..k|2=if(bel|
|00000830| 6f 77 28 6b 32 2c 30 29 | 2c 2d 31 30 30 30 2c 6b |ow(k2,0)|,-1000,k|
|00000840| 32 29 3b 0d 0a 6b 33 3d | 28 6f 78 2b 73 69 67 6e |2);..k3=|(ox+sign|
|00000850| 28 64 78 33 29 29 2f 64 | 78 33 3b 0d 0a 6b 33 3d |(dx3))/d|x3;..k3=|
|00000860| 69 66 28 62 65 6c 6f 77 | 28 6b 33 2c 30 29 2c 2d |if(below|(k3,0),-|
|00000870| 31 30 30 30 2c 6b 33 29 | 3b 0d 0a 64 78 31 3d 6d |1000,k3)|;..dx1=m|
|00000880| 61 78 28 6d 69 6e 28 6d | 61 78 28 6b 31 2c 6b 32 |ax(min(m|ax(k1,k2|
|00000890| 29 2c 6b 33 29 2c 6d 69 | 6e 28 6d 61 78 28 6b 32 |),k3),mi|n(max(k2|
|000008a0| 2c 6b 33 29 2c 6b 31 29 | 29 3b 0d 0a 64 79 31 3d |,k3),k1)|);..dy1=|
|000008b0| 6d 69 6e 28 6b 32 2c 6b | 33 29 3b 0d 0a 69 7a 3d |min(k2,k|3);..iz=|
|000008c0| 2d 6f 7a 2d 6f 7a 66 2b | 64 7a 33 2a 64 79 31 3b |-oz-ozf+|dz3*dy1;|
|000008d0| 6b 3d 69 66 28 62 65 6c | 6f 77 28 61 62 73 28 69 |k=if(bel|ow(abs(i|
|000008e0| 7a 29 2c 2e 39 39 29 2c | 64 78 31 2c 64 79 31 29 |z),.99),|dx1,dy1)|
|000008f0| 3b 0d 0a 69 78 3d 2d 6f | 78 2b 64 78 33 2a 6b 3b |;..ix=-o|x+dx3*k;|
|00000900| 69 79 3d 2d 6f 79 2b 64 | 79 32 2a 6b 3b 69 7a 3d |iy=-oy+d|y2*k;iz=|
|00000910| 2d 6f 7a 2d 6f 7a 66 2b | 64 7a 33 2a 6b 3b 0d 0a |-oz-ozf+|dz3*k;..|
|00000920| 6b 77 3d 65 71 75 61 6c | 28 6b 2c 2d 31 30 30 30 |kw=equal|(k,-1000|
|00000930| 29 3b 61 6c 70 68 61 3d | 31 2d 6b 77 3b 0d 0a 78 |);alpha=|1-kw;..x|
|00000940| 3d 69 66 28 65 71 75 61 | 6c 28 6b 2c 6b 32 29 2c |=if(equa|l(k,k2),|
|00000950| 69 78 2a 73 69 67 6e 28 | 69 79 29 2c 69 66 28 65 |ix*sign(|iy),if(e|
|00000960| 71 75 61 6c 28 6b 2c 6b | 33 29 2c 69 79 2a 73 69 |qual(k,k|3),iy*si|
|00000970| 67 6e 28 69 78 29 2c 69 | 78 29 29 3b 0d 0a 79 3d |gn(ix),i|x));..y=|
|00000980| 69 66 28 65 71 75 61 6c | 28 6b 2c 6b 32 29 2c 69 |if(equal|(k,k2),i|
|00000990| 7a 2c 69 66 28 65 71 75 | 61 6c 28 6b 2c 6b 33 29 |z,if(equ|al(k,k3)|
|000009a0| 2c 69 7a 2c 69 79 2a 73 | 69 67 6e 28 69 7a 29 29 |,iz,iy*s|ign(iz))|
|000009b0| 29 3b 0d 0a 64 3d 73 71 | 72 74 28 73 71 72 28 69 |);..d=sq|rt(sqr(i|
|000009c0| 78 2b 6f 78 29 2b 73 71 | 72 28 69 79 2b 6f 79 29 |x+ox)+sq|r(iy+oy)|
|000009d0| 2b 73 71 72 28 69 7a 2b | 6f 7a 2b 6f 7a 66 29 29 |+sqr(iz+|oz+ozf))|
|000009e0| 3b 0d 0a 61 6c 70 68 61 | 3d 69 66 28 62 65 6c 6f |;..alpha|=if(belo|
|000009f0| 77 28 6b 2c 30 29 2c 30 | 2c 32 2f 64 2d 2e 31 35 |w(k,0),0|,2/d-.15|
|00000a00| 29 3b 64 3d 74 2a 2e 30 | 33 3b 0d 0a 78 3d 78 2b |);d=t*.0|3;..x=x+|
|00000a10| 64 3b 0d 0a 79 3d 79 2b | 64 3b 00 73 04 00 00 74 |d;..y=y+|d;.s...t|
|00000a20| 3d 74 2d 30 2e 35 3b 63 | 74 3d 69 66 28 65 71 75 |=t-0.5;c|t=if(equ|
|00000a30| 61 6c 28 6d 64 2c 33 29 | 2c 74 2c 63 74 29 3b 0d |al(md,3)|,t,ct);.|
|00000a40| 0a 6f 78 3d 73 69 6e 28 | 74 2a 2e 30 39 31 34 29 |.ox=sin(|t*.0914)|
|00000a50| 2a 63 6f 73 28 74 2a 2e | 30 34 31 31 29 2a 2e 38 |*cos(t*.|0411)*.8|
|00000a60| 3b 0d 0a 6f 79 3d 73 69 | 6e 28 74 2a 2e 30 36 37 |;..oy=si|n(t*.067|
|00000a70| 34 29 2a 63 6f 73 28 74 | 2a 2e 30 33 37 39 29 2a |4)*cos(t|*.0379)*|
|00000a80| 2e 38 2a 63 6f 73 28 73 | 69 6e 28 74 2a 2e 30 34 |.8*cos(s|in(t*.04|
|00000a90| 37 31 29 29 3b 0d 0a 6f | 7a 66 3d 73 69 6e 28 74 |71));..o|zf=sin(t|
|00000aa0| 2a 2e 30 33 34 36 29 2a | 63 6f 73 28 74 2a 2e 30 |*.0346)*|cos(t*.0|
|00000ab0| 34 39 33 29 2a 2e 38 2a | 63 6f 73 28 73 69 6e 28 |493)*.8*|cos(sin(|
|00000ac0| 74 2a 2e 30 31 31 36 29 | 29 3b 0d 0a 64 78 31 3d |t*.0116)|);..dx1=|
|00000ad0| 73 69 6e 28 74 2a 2e 30 | 33 37 33 29 2a 63 6f 73 |sin(t*.0|373)*cos|
|00000ae0| 28 74 2a 30 2e 30 35 36 | 33 29 2a 73 69 6e 28 63 |(t*0.056|3)*sin(c|
|00000af0| 6f 73 28 74 2a 2e 30 32 | 33 31 29 29 2a 31 2e 31 |os(t*.02|31))*1.1|
|00000b00| 3b 0d 0a 64 79 31 3d 73 | 69 6e 28 74 2a 2e 30 33 |;..dy1=s|in(t*.03|
|00000b10| 31 31 29 2a 63 6f 73 28 | 74 2a 30 2e 30 36 31 29 |11)*cos(|t*0.061)|
|00000b20| 2a 73 69 6e 28 63 6f 73 | 28 74 2a 2e 30 31 31 35 |*sin(cos|(t*.0115|
|00000b30| 29 29 2a 31 2e 31 3b 0d | 0a 6f 7a 6f 3d 2d 6d 61 |))*1.1;.|.ozo=-ma|
|00000b40| 78 28 6d 69 6e 28 28 61 | 62 73 28 6f 7a 29 2b 28 |x(min((a|bs(oz)+(|
|00000b50| 31 2d 63 6e 29 29 2a 2e | 33 2c 2e 33 29 2c 2e 30 |1-cn))*.|3,.3),.0|
|00000b60| 31 29 3b 0d 0a 6f 7a 3d | 69 66 28 61 62 6f 76 65 |1);..oz=|if(above|
|00000b70| 28 6d 64 2c 31 29 2c 6f | 7a 2b 6f 7a 6f 2c 30 29 |(md,1),o|z+ozo,0)|
|00000b80| 3b 0d 0a 6f 7a 3d 69 66 | 28 62 65 6c 6f 77 28 6f |;..oz=if|(below(o|
|00000b90| 7a 2c 2d 31 30 29 2c 6f | 7a 2b 33 30 2c 6f 7a 29 |z,-10),o|z+30,oz)|
|00000ba0| 3b 0d 0a 6d 64 3d 69 66 | 28 62 61 6e 64 28 61 62 |;..md=if|(band(ab|
|00000bb0| 6f 76 65 28 6f 7a 2c 33 | 29 2c 65 71 75 61 6c 28 |ove(oz,3|),equal(|
|00000bc0| 6d 64 2c 32 29 29 2c 33 | 2c 6d 64 29 3b 0d 0a 6d |md,2)),3|,md);..m|
|00000bd0| 64 3d 69 66 28 62 61 6e | 64 28 62 65 6c 6f 77 28 |d=if(ban|d(below(|
|00000be0| 61 62 73 28 6f 7a 29 2c | 2e 31 31 29 2c 65 71 75 |abs(oz),|.11),equ|
|00000bf0| 61 6c 28 6d 64 2c 33 29 | 29 2a 72 61 6e 64 28 32 |al(md,3)|)*rand(2|
|00000c00| 29 2a 63 6e 2c 30 2c 6d | 64 29 3b 0d 0a 6d 64 3d |)*cn,0,m|d);..md=|
|00000c10| 69 66 28 62 61 6e 64 28 | 65 71 75 61 6c 28 6d 64 |if(band(|equal(md|
|00000c20| 2c 31 29 2c 62 65 6c 6f | 77 28 6d 61 78 28 61 62 |,1),belo|w(max(ab|
|00000c30| 73 28 72 78 29 2c 61 62 | 73 28 72 79 29 29 2c 2e |s(rx),ab|s(ry)),.|
|00000c40| 31 29 29 2c 32 2c 6d 64 | 29 3b 0d 0a 6d 64 3d 69 |1)),2,md|);..md=i|
|00000c50| 66 28 6d 64 2c 6d 64 2c | 61 62 6f 76 65 28 63 74 |f(md,md,|above(ct|
|00000c60| 2d 74 2c 38 35 2b 72 61 | 6e 64 28 31 30 29 2a 2e |-t,85+ra|nd(10)*.|
|00000c70| 35 29 29 3b 0d 0a 6b 31 | 3d 65 71 75 61 6c 28 6d |5));..k1|=equal(m|
|00000c80| 64 2c 31 29 3b 0d 0a 72 | 78 6f 3d 69 66 28 6b 31 |d,1);..r|xo=if(k1|
|00000c90| 2c 69 66 28 62 65 6c 6f | 77 28 61 62 73 28 72 78 |,if(belo|w(abs(rx|
|00000ca0| 29 2c 2e 31 29 2c 30 2c | 69 66 28 62 65 6c 6f 77 |),.1),0,|if(below|
|00000cb0| 28 73 64 2c 32 29 2c 2e | 30 35 2c 2d 2e 30 35 29 |(sd,2),.|05,-.05)|
|00000cc0| 29 2c 72 78 6f 2a 62 65 | 6c 6f 77 28 6d 64 2c 31 |),rxo*be|low(md,1|
|00000cd0| 29 29 3b 0d 0a 72 79 6f | 3d 69 66 28 6b 31 2c 69 |));..ryo|=if(k1,i|
|00000ce0| 66 28 62 65 6c 6f 77 28 | 61 62 73 28 72 79 29 2c |f(below(|abs(ry),|
|00000cf0| 2e 31 29 2c 30 2c 69 66 | 28 73 64 25 32 2c 2e 30 |.1),0,if|(sd%2,.0|
|00000d00| 35 2c 2d 2e 30 35 29 29 | 2c 72 79 6f 2a 62 65 6c |5,-.05))|,ryo*bel|
|00000d10| 6f 77 28 6d 64 2c 31 29 | 29 3b 0d 0a 72 78 74 3d |ow(md,1)|);..rxt=|
|00000d20| 69 66 28 6b 31 2c 30 2e | 31 2a 28 72 61 6e 64 28 |if(k1,0.|1*(rand(|
|00000d30| 32 29 2a 32 2d 31 29 2c | 72 78 74 29 3b 72 79 74 |2)*2-1),|rxt);ryt|
|00000d40| 3d 69 66 28 6b 31 2c 30 | 2e 31 2c 72 79 74 29 3b |=if(k1,0|.1,ryt);|
|00000d50| 0d 0a 72 79 3d 69 66 28 | 61 62 6f 76 65 28 61 62 |..ry=if(|above(ab|
|00000d60| 73 28 72 79 29 2c 70 69 | 29 2c 72 79 2d 32 2a 70 |s(ry),pi|),ry-2*p|
|00000d70| 69 2a 73 69 67 6e 28 72 | 79 29 2b 72 79 6f 2c 72 |i*sign(r|y)+ryo,r|
|00000d80| 79 2b 72 79 6f 29 3b 0d | 0a 72 78 3d 69 66 28 61 |y+ryo);.|.rx=if(a|
|00000d90| 62 6f 76 65 28 61 62 73 | 28 72 78 29 2c 70 69 29 |bove(abs|(rx),pi)|
|00000da0| 2c 72 78 2d 32 2a 70 69 | 2a 73 69 67 6e 28 72 78 |,rx-2*pi|*sign(rx|
|00000db0| 29 2b 72 78 6f 2c 72 78 | 2b 72 78 6f 29 3b 0d 0a |)+rxo,rx|+rxo);..|
|00000dc0| 72 7a 3d 72 7a 2b 73 69 | 6e 28 74 2a 2e 30 35 33 |rz=rz+si|n(t*.053|
|00000dd0| 29 2a 63 6f 73 28 74 2a | 2e 31 31 37 29 2a 73 69 |)*cos(t*|.117)*si|
|00000de0| 6e 28 63 6f 73 28 74 2a | 2e 30 36 35 31 29 29 2a |n(cos(t*|.0651))*|
|00000df0| 2e 31 3b 0d 0a 63 78 3d | 63 6f 73 28 72 78 2b 64 |.1;..cx=|cos(rx+d|
|00000e00| 78 31 29 3b 73 78 3d 73 | 69 6e 28 72 78 2b 64 78 |x1);sx=s|in(rx+dx|
|00000e10| 31 29 3b 63 79 3d 63 6f | 73 28 72 79 2b 64 79 31 |1);cy=co|s(ry+dy1|
|00000e20| 29 3b 73 79 3d 73 69 6e | 28 72 79 2b 64 79 31 29 |);sy=sin|(ry+dy1)|
|00000e30| 3b 63 7a 3d 63 6f 73 28 | 72 7a 29 3b 73 7a 3d 73 |;cz=cos(|rz);sz=s|
|00000e40| 69 6e 28 72 7a 29 3b 0d | 0a 61 66 3d 68 2f 77 3b |in(rz);.|.af=h/w;|
|00000e50| 72 78 6f 3d 72 78 6f 2a | 2e 38 2b 72 78 74 2a 2e |rxo=rxo*|.8+rxt*.|
|00000e60| 32 3b 72 79 6f 3d 72 79 | 6f 2a 2e 38 2b 72 79 74 |2;ryo=ry|o*.8+ryt|
|00000e70| 2a 2e 32 3b 0d 0a 63 6e | 3d 69 66 28 61 62 6f 76 |*.2;..cn|=if(abov|
|00000e80| 65 28 62 74 2d 74 2c 37 | 35 29 2c 31 2c 63 6e 29 |e(bt-t,7|5),1,cn)|
|00000e90| 3b 00 af 00 00 00 72 78 | 74 3d 28 72 61 6e 64 28 |;.....rx|t=(rand(|
|00000ea0| 31 30 30 29 2a 2e 30 31 | 29 2a 28 72 61 6e 64 28 |100)*.01|)*(rand(|
|00000eb0| 32 29 2a 32 2d 31 29 2a | 2e 30 39 3b 0d 0a 72 79 |2)*2-1)*|.09;..ry|
|00000ec0| 74 3d 28 72 61 6e 64 28 | 31 30 30 29 2a 2e 30 31 |t=(rand(|100)*.01|
|00000ed0| 29 2a 28 72 61 6e 64 28 | 32 29 2a 32 2d 31 29 2a |)*(rand(|2)*2-1)*|
|00000ee0| 2e 30 39 3b 0d 0a 6d 64 | 3d 69 66 28 6d 64 2c 6d |.09;..md|=if(md,m|
|00000ef0| 64 2c 61 62 6f 76 65 28 | 74 2d 63 74 2c 34 30 29 |d,above(|t-ct,40)|
|00000f00| 29 3b 0d 0a 63 6e 3d 31 | 2d 72 61 6e 64 28 32 29 |);..cn=1|-rand(2)|
|00000f10| 2a 72 61 6e 64 28 32 29 | 2a 72 61 6e 64 28 32 29 |*rand(2)|*rand(2)|
|00000f20| 3b 0d 0a 62 74 3d 74 3b | 0d 0a 73 64 3d 69 66 28 |;..bt=t;|..sd=if(|
|00000f30| 72 61 6e 64 28 39 29 2c | 73 64 2c 72 61 6e 64 28 |rand(9),|sd,rand(|
|00000f40| 34 29 29 3b 00 47 00 00 | 00 74 3d 72 61 6e 64 28 |4));.G..|.t=rand(|
|00000f50| 31 30 30 29 3b 70 69 3d | 61 63 6f 73 28 2d 31 29 |100);pi=|acos(-1)|
|00000f60| 3b 72 78 74 3d 2e 30 31 | 3b 72 79 74 3d 2d 2e 30 |;rxt=.01|;ryt=-.0|
|00000f70| 31 31 33 3b 6d 64 3d 30 | 3b 6f 7a 6f 3d 2d 30 2e |113;md=0|;ozo=-0.|
|00000f80| 31 3b 63 6e 3d 31 3b 62 | 74 3d 74 2b 37 37 3b 00 |1;cn=1;b|t=t+77;.|
|00000f90| 00 00 00 00 01 00 00 00 | 20 00 00 00 20 00 00 00 |........| ... ...|
|00000fa0| 01 00 00 00 01 00 00 00 | 01 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+